home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_2 / star-1_0.tar / t48.star < prev    next >
Text File  |  1991-03-22  |  364b  |  41 lines
  1. ; STAR HP-48SX Standard Macro Library test
  2.  
  3.     radix    d'10
  4.  
  5.     .=x'70000
  6.  
  7.     real    0
  8.     complex    1, 2
  9.  
  10.     string    `ABC'
  11.     string
  12.  
  13.     global
  14.     global    `ABCDE'
  15.  
  16.     local
  17.     local    `ABCD'
  18.  
  19.     binary    0
  20.     binary    x'4711, 5
  21.  
  22.     short    x'1234
  23.     address    x'5678
  24.  
  25.     character 48
  26.     character `0'
  27.     character
  28.  
  29.     Drop=x'3244
  30.  
  31.     rpl
  32.       Drop
  33.       Drop
  34.       _string `abc'
  35.       _real pi
  36.     endrpl
  37.  
  38.     code
  39.       add.a a,a
  40.     endcode
  41.